home *** CD-ROM | disk | FTP | other *** search
/ Shareware Extravaganza - Disc 4 / Shareware Extravaganza - Over 25,000 Programs (The Ultimate Shareware Company)(Disc 4 of 4)(1993).iso / cad / dbgraf.zip / GRAFGEN.CMD < prev   
OS/2 REXX Batch file  |  1991-01-21  |  512b  |  37 lines
  1. * GRAFGEN.CMD
  2. * COPYRIGHT (c) 1983 BY DAVID A. BASSKIN
  3. * FREE UNLIMITED USE GRANTED - NO RESALE OR
  4. * COMMERCIAL USE PERMITTED - SEE COPYRIGHT NOTE
  5. * IN TEXT FILE DBGRAF.DOC
  6. *
  7. SET COLON OFF
  8. SET INTENSITY OFF
  9. SET TALK OFF
  10. ERASE
  11. STORE 0 TO X
  12. DO WHILE X<256
  13.  @ 4,0 SAY 'THIS IS CHARACTER NUMBER'
  14.  @ 4,25 SAY X USING '##'
  15.  POKE 62000,X
  16.  STORE 1 TO Y
  17.  DO WHILE Y<51
  18.   STORE Y+1 TO Y
  19.  ENDDO
  20.  STORE X+1 TO X
  21. ENDDO
  22. RELEASE X,Y
  23. RETURN
  24.  
  25.  
  26.  
  27.  
  28.  
  29.  
  30.  
  31.  
  32.  
  33.  
  34.  
  35.  
  36.  
  37.